home *** CD-ROM | disk | FTP | other *** search
/ Chip 2003 February / Chip_2003-02_cd1.bin / zkuste / xptools / install / Xsetup / setup.exe / {app} / plugins / XQ COM Options 1.xpl < prev    next >
Text File  |  2002-12-19  |  3KB  |  81 lines
  1. "FILE"="Xteq Systems X-Setup Plugin 6.0"
  2. "TYPE"="9"
  3. "COUNT"="5"
  4. "UIPATH"="Hardware\Modem"
  5. "NAME"="COM Port Speed"
  6. "VERSION"="3.03"
  7. "OSVERSION"="111111"
  8. "LANGUAGE"="VBScript"
  9. "TEXT 1"="Speed up..."
  10. "DESCRIPTION 1"="WARNING: Do this ONLY IF using dial-up (analog) modems (e.g. 56K, ISDN) connected ONLY to a Serial Port (COMx), NOT IF using xDSL, Cable, Satellite, CNR, USB or Network (digital) modems!"
  11. "DESCRIPTION 2"="By default all Windows 95/98/NT4/2000/ME/XP releases allow only up to 9600 bps (bits per second) on all Serial Ports: COMx = COM1 - COM9 [BIOS (hardware) ports: COM1 - COM4 ; Virtual (emulated) ports: COM5 - COM9]."
  12. "DESCRIPTION 3"="These settings enable serial (analog) modem throughput over 9600 bps, to speed up significantly Internet access."
  13. "DESCRIPTION 4"="See [http://members.aol.com/axcel216/last2.htm#FAST] and [http://members.aol.com/axcel216/newtip15.htm#F56K] for more Win95/98/ME details."
  14. "DESCRIPTION 5"="WARNING: If using internal modems located in the Communication Networking Riser (CNR) slot, do NOT use these settings! Such cards rely on a very tricky method to work, which is incompatible with these settings."
  15. "AUTHOR"="Xteq Systems"
  16. "CONTACTURL"="http://www.xteq.com/"
  17. "COPYRIGHT"="Copyright ⌐ Xteq Systems - All Rights Reserved"
  18. "COMMENT 1"="Thanks to AXCEL216 [http://members.aol.com/axcel216/] + CptSiskoX [http://members.fortunecity.com/computingx/]."
  19. "COMMENT 2"="Thanks to Manish Jain [emmjanex@hotmail.com] for the CNR bug notice."
  20. "WARNING"="1"
  21.  
  22.  
  23. '
  24. sFile="WIN.INI"
  25. sReg="HKLM\SOFTWARE\Microsoft\Windows NT\CurrentVersion\Ports"
  26. sSec="Ports"
  27. sTa="COM"
  28. sTb=":"
  29. '*DEFAULT*
  30. sV_Normal="9600,n,8,1,x"
  31. '*BETTER*
  32. sV_Better="921600,n,8,1,p"
  33. bIniMode=true
  34. Sub Plugin_Initialize
  35. Call SetUIElement(1,"Speed up COM1:")
  36. Call SetUIElement(2,"Speed up COM2:")
  37. Call SetUIElement(3,"Speed up COM3:")
  38. Call SetUIElement(4,"Speed up COM4:")
  39. Call SetUIElement(5,"Speed up COM5:")
  40. Call SetUIElement(6,"Speed up COM6:")
  41. Call SetUIElement(7,"Speed up COM7:")
  42. Call SetUIElement(8,"Speed up COM8:")
  43. Call SetUIElement(9,"Speed up COM9:")
  44. if GetWinVer=1 or GetWinVer=3 then
  45. bIniMode=true
  46. else
  47. bIniMode=false
  48. end if
  49. for i=1 to 9
  50. s=sTa & i & sTb
  51. if bIniMode then
  52. s=IniReadValue(sFILE,sSec,s)
  53. else
  54. s=RegReadValue(sReg & s)
  55. end if
  56. if s=sV_Better then
  57. Call SetUIElementEx(i,true)
  58. end if
  59. next
  60. End Sub
  61. Sub Plugin_CheckData(ElementIndex)
  62. End Sub
  63. Sub Plugin_Apply(ElementIndex,ElementSubIndex)
  64. for i=1 to 9
  65. b=GetUIElementEx(i)
  66. s=sTa & i & sTb
  67. if b=true then
  68. sTemp=sV_Better
  69. else
  70. sTemp=sV_Normal
  71. end if
  72. if bIniMode then
  73. Call IniWriteValue(sFILE,sSec,s,sTemp)
  74. else
  75. Call RegWriteValue(sReg & s,sTemp,1)
  76. end if
  77. next
  78. Call Logoff()
  79. End Sub
  80. Sub Plugin_Terminate
  81. End Sub